home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 15 / Amiga Plus Leser CD 15.iso / Tools / Development / CIT.v4 / Demo / PaletteTest.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  2002-03-13  |  1.4 KB  |  79 lines
  1. #include <CITGroup.h>
  2. #include <CITButton.h>
  3. #include <CITPalette.h>
  4.  
  5. CITApp Application;
  6.  
  7. CITWorkbench DemoScreen;
  8. CITWindow    DemoWindow;
  9. CITVGroup    winGroup;
  10. CITPalette   palette;
  11. CITButton    quitButton;
  12.  
  13. void CloseEvent();
  14. void QuitEvent(ULONG ID);
  15.  
  16. int main(void)
  17. {
  18.   BOOL Error=FALSE;
  19.  
  20.   DemoScreen.InsObject(DemoWindow,Error);
  21.     //DemoWindow.Position(WPOS_CENTERSCREEN);
  22.     DemoWindow.CloseGadget();
  23.     //DemoWindow.DragBar();
  24.     DemoWindow.SizeGadget();
  25.     DemoWindow.DepthGadget();
  26.     //DemoWindow.IconifyGadget();
  27.     //DemoWindow.Activate();
  28.     DemoWindow.Caption("CITPalette Test");
  29.     DemoWindow.CloseEventHandler(CloseEvent);
  30.     DemoWindow.InsObject(winGroup,Error);
  31.       winGroup.SpaceOuter();
  32.       winGroup.InsObject(palette,Error);
  33.         palette.MinWidth(200);
  34.         palette.MinHeight(150);
  35.         palette.NumColours(256);
  36.       winGroup.InsObject(quitButton,Error);
  37.         quitButton.Text("Quit");
  38.         quitButton.MaxHeight(20);
  39.         quitButton.EventHandler(QuitEvent);
  40.  
  41.   Application.InsObject(DemoScreen,Error);
  42.  
  43.   // Ok?
  44.   if( Error )
  45.     return 10;
  46.  
  47.   Application.Run();
  48.  
  49.   return 0;
  50. }
  51.  
  52. void QuitEvent(ULONG ID)
  53. {
  54.   Application.Stop();
  55. }
  56.  
  57.  
  58. int repeatCount = 0;
  59.  
  60. void CloseEvent()
  61. {
  62.   int num;
  63.  
  64.   repeatCount++;
  65.  
  66.   switch( repeatCount )
  67.   {
  68.     case 1:
  69.       palette.Colour(5);
  70.       break;
  71.     case 2:
  72.       num = palette.Colour();
  73.       break;
  74.     default:
  75.       Application.Stop();
  76.     break;
  77.   }
  78. }
  79.